www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminHTML\D_kaozhan_by_conutiue.asp
<% '************************************************************** ' 新动软网站管理系统 ' 官方网站: http://www.aspcpu.com ' 系统作者: 阮丁远(网名:天下程序) ' Copyright 新动软网站管理系统 版权所有 '************************************************************** %> <DIV id="loading_msg" style="position:absolute; z-index:200; top:210px; left:184px; background-color:#ffffff; width: 556px; height: 50px;" > 请稍后......</div> <div style="background: url('../img/loading_kuang.jpg') repeat-x;text- align:center;width:256px;height:25px;position:absolute;top:270;left:200;font-size:13px"> <div id="proc" style="background: url('../img/loading_bar.jpg');position:absolute;top:0;left:0;width:0px;height:18px;font- size:13px"></div> <div style="position:absolute;top:2;left:0;width:256px;height:18px;text-align:center;font- size:13px;background:transparent"> </div> </div> <br> <DIV id="loading_msg_xiangxi" style="position:absolute; z-index:201; top:310px; left:184px; background-color:#ffffff; width: 556px; height: 50px;" > </div> <br> <DIV id="ttgg" style="position:absolute; z-index:201; top:430px; left:184px; background-color:#ffffff; width: 580px; height: 100px;" > <input type="checkbox" id="tiao_rara" name="tiao_rara" value="1" checked>自动跳过链接到大的.rar,.zip,.pdf,.avi等文件的链接,防止卡住 </div> <% dir_set="../../" %> <!--#include file=../../inc/conn.asp--> <!--#include file=../../inc/Functionb.asp--> <!--#include file=../inc/checkadmin2.asp--> <!--#include file=../../inc/functionFiless.asp--> <script type="text/javascript" src="../../inc/zxml.js"></script> <!--#include file=../../inc/ajaxLIB_no_loader.asp--> <!--#include file=../../inc/ND_class_function.asp--> <!--#include file="makehtm_inc/clsCachea.asp"--> <% if find_dataw("qitashezhi123","0",6)<>"1" and qx_if_max=0 then response.redirect "../D_suodinguser.asp" end if %> <% Server.ScriptTimeout=9999999 session.timeout=600 call all_update_qiantai_web_filenames_config_xml() ' 检测组件变量 dim isobj,VerObj,TestObj '检查组件是否被支持及组件版本的子程序 sub ObjTest(strObj) on error resume next IsObj=false VerObj="" set TestObj=server.CreateObject (strObj) If -2147221005 <> Err then '感谢网友iAmFisher的宝贵建议 IsObj = True VerObj = TestObj.version if VerObj="" or isnull(VerObj) then VerObj=TestObj.about end if set TestObj=nothing End sub ObjTest(fssoo_nd_var_str_x_customx) if not isobj then sss1="检测中:对不起,由于你的系统不支持FSO组件,所以无法使用本后台" %> <script language="javascript"> setTimeout("document.all.loading_msg.innerHTML='<font color=#000000><%=sss1%></font>';",300); alert("对不起,由于你的系统不支持FSO组件,所以无法使用本后台"); alert("对不起,由于你的系统不支持FSO组件,所以无法使用本后台"); alert("对不起,由于你的系统不支持FSO组件,所以无法使用本后台"); </script> <% response.end else sss1="检测中:支持FSO......" %> <script language="javascript"> document.execCommand("BackgroundImageCache",false,true); function ProcessBar(obj){ this.isMoving = false; this.maxLength = parseInt(obj.parentNode.style.width.replace("px","")); this.nowLength = parseInt(obj.style.width.replace("px","")); this.moveInterval = 100; this.moveRange = 1; this.timer; this.obj = obj; ProcessBar.nowObj = this; this.startlistener = function(){ this.timer = window.setInterval(ProcessBar.nowObj.moving, this.moveInterval); } this.changepos = function(pos){ ProcessBar.nowObj.nowLength=ProcessBar.nowObj.maxLength*pos; } this.moving = function(){ //ProcessBar.nowObj.nowLength += ProcessBar.nowObj.moveRange; ProcessBar.nowObj.obj.style.width = ProcessBar.nowObj.nowLength; ProcessBar.nowObj.obj.parentNode.lastChild.firstChild.data = Math.ceil ((ProcessBar.nowObj.nowLength/ProcessBar.nowObj.maxLength)*100) + "%"; if(ProcessBar.nowObj.nowLength >= ProcessBar.nowObj.maxLength){ window.clearInterval(ProcessBar.nowObj.timer); ProcessBar.nowObj.obj.parentNode.lastChild.firstChild.data = "即将进入下一步操作..."; } } } var processBar = new ProcessBar(proc); processBar.startlistener(); </script> <script language="javascript"> setTimeout("document.all.loading_msg.innerHTML='<font color=#000000><%=sss1%></font>';",0); setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>正在拷贝页面...,请稍后</font>';",300); var ended=0; var ended2=0; var pos=""; var msg1=""; var needdo=1; var pos22="1"; ended2=0; var stu="ok"; pos22="1" //已用了asp里我自定义的sleep睡眠函数,js里的不用了 var per_sleep_time=5; var tiao_rar=1; var ewww="<%=replace(request("url"),chr(34),"")%>"; var ewww2="<%=replace(request("wwws"),chr(34),"")%>" var tofolder="<%=replace(request("tofolder"),chr(34),"")%>"; var idd="<%=request("id")%>"; //循环延时,防止卡住: var w2 = setInterval("do_kernel_htm()",40); var a22=AJAXcreateXMLdocument(); a22.onreadystatechange=function(){ if (a22.readyState==4) { if (a22.parseError.errorCode!=0){ alert("数据读取错误,请重试!!"); } var root2=a22.documentElement; var s2s1=root2.firstChild.text; var s2s2=root2.childNodes[1].text; var s2s4=root2.childNodes[2].text; var zong_num=parseInt(root2.childNodes[3].text); var htmed_num=parseInt(root2.childNodes[4].text); if (s2s1==1){ended2=1;} msg1=s2s2; pos22=""; needdo=1; setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"正在拷贝页面 "+msg1+" ...</font>';",1500); processBar.changepos(htmed_num/zong_num); document.all.loading_msg_xiangxi.innerHTML="<font color=#0000ff>已发现的页面链接总数:</font><font color=#ff0000>"+zong_num+"</font>, <font color=#0000ff>已拷贝的页面总数:</font><font color=#ff0000>"+htmed_num+"</font>,<br><br><a href='D_kaozhan_down_needfiles.asp'>点击本处放弃继续拷网页而进入下一步的拷网页图片和css的操作</a><br><br><a href='D_admin_kaozhan.asp'>暂停</a>"; if (ended2==0){ } else { setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"拷贝完成,即将进行图片,js,css的自动下载操作......"+"</font>';",1500); setTimeout("self.location='D_kaozhan_down_needfiles.asp';",1000); } if (s2s4=="wrong"){ stu="nook"; alert("asp 运行出错:\n\n"+msg1); } if (s2s4=="notv"){ stu="nook"; document.all.loading_msg.innerHTML="必须输入一个带网页页面地址的网址,比如http://www.1112233.com后带11.htm或11.asp?a=1或11.aspx?a=1或....这样的后缀的,而不是纯http://www.1112233.com,后面要带页面地址,可以不是首页,可以是其他页,如果指定的网页打开后会自动跳转到另一网页,则要填此跳转后的网页的地址,如http://www.1122333.com/index.asp,打开http://www.1122333.com/index.asp后自动跳转到http://www.1122333.com/web/index.asp,则要填http://www.1122333.com/web/index.asp才行"; document.all.loading_msg_xiangxi.innerHTML=""; alert("必须输入一个带网页页面地址的网址,\n比如http://www.1112233.com后带11.htm或11.asp?a=1或11.aspx?a=1或....这样的后缀的,而不是纯http://www.1112233.com,后面要带页面地址,可以不是首页,可以是其他页,\n\n如果指定的网页打开后会自动跳转到另一网页,则要填此跳转后的网页的地址,\n如http://www.1122333.com/index.asp,打开http://www.1122333.com/index.asp后自动跳转到http://www.1122333.com/web/index.asp,则要填http://www.1122333.com/web/index.asp才行"); } } } function do_kernel_htm(){ if(document.getElementById("tiao_rara").checked==true){ tiao_rar=1; } else { tiao_rar=0; } if (needdo==1&&ended2==0&&stu=="ok"){ needdo=0; a22.async=true; //异步模式 setTimeout("do_it();",per_sleep_time); } } function do_it(){ a22.load("D_ajax_kaozhan.asp?tiao_rar="+tiao_rar+"&ewww="+ewww+"&pos="+pos22+"&tofolder="+tofolder+"&id="+idd+"&bianma=<%=request("bianma")%>"); } </script> <% end if %>